(describe-char-after): Use `font-lock-face' to italicize property names.

diff --git a/lisp/international/mule-diag.el b/lisp/international/mule-diag.el
index 055da29a83e694d8cd11b89e97bf4316fb30f46e..2082734983d056aa8c17dd5f9c16594d22604bce 100644 (file)
--- a/lisp/international/mule-diag.el
+++ b/lisp/international/mule-diag.el
@@ -673,8 +673,9 @@ which font is being used for displaying the character."
                           (lambda (a b)
                             (< (length (cdr a))
                                (length (cdr b))))))
-         (insert (format "  %s: %s\n" (car elt) (cdr elt))))
-       ))))
+         (insert (format "  %s: %s\n" (propertize (symbol-name (car elt))
+                                                  'font-lock-face 'italic)
+                         (cdr elt))))))))
 
 \f
 ;;; CODING-SYSTEM